home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Auge 4000
/
Auge 4000 #44 (1990-05-04)(Amiga User Gruppe Einzugsgebiet 4000).zip
/
Auge 4000 #44 (1990-05-04)(Amiga User Gruppe Einzugsgebiet 4000).adf
/
Anwendungen
/
Label-Print
/
LABEL.GFA
(
.txt
)
< prev
next >
Wrap
GFA-BASIC Amiga
|
1990-05-01
|
29KB
|
163 lines
GFA-AMIGAB
SCHRIFTFARBE
ALERT1
KANTENTEXT
EINGABE
LABEL1
ZWISCHENSPEICHERN
ZR2 TEXTZEILE
FARBEN_SETZEN
AUFBAU_HAUPTSEITE
TOOLBOX TEXT_NR_1
BILD_ZWISCHENSPEICHERN
DRUCKEN
HILFE
FEHLER
ZEICHENFARBE
SCHRIFTFARBE
LABEL
NEUE_SEITE
LINIE TEXTMODUS
KANTE
FREIHAND BOX_MALEN
BOX_F
KREIS_F
KREIS
FARBAUSWAHL
SCHRIFTFARBE_EINSTELLEN
LABEL_NR_1
LABEL_NR_2
LABEL_NR_3
LABEL_NR_4
LABEL_NR_5
AUSWAHL_RAMEN TEXTZEILE TEXT_NR_2
DISKETTEN-LABEL F
HAUPTSEITE F
<======= unterprogramm verlassen
0;31;42"B
m "FF
UNDOF
<======= unterprogr. verlassen
<Systemdiskette mit Druckertreiber|in DF0:|und Drucker an ???FF
JA | NEIN !
* <======= unterprogr. verlassen
QUITF
!Wirklich das Programm Verlassen ?F
ENDEF
NEINF
QUITF
INFOF
INFOF
! <======= unterprogr. verlassen
FARBAUSWAHL SCHRIFT F
ZEICHENFARBE Fs
NR.0 -->F
NR.1 -->F
NR.2 -->F
NR.3 -->F
NR.4 -->F
NR.5 -->F
NR.6 -->F
NR.7 -->F
OK -->"FF
KANTENTEXT max 40 Zeichen !F
TEXT "FF
) F
0;30;42"B
m "FF
0;31;42"B
m "FF
0;32;42"B
m "FF
0;33;42"B
m "FF
0;34;42"B
m "FF
0;35;42"B
m "FF
0;36;42"B
m "FF
0;37;42"B
m "FF
ZEICHENFARBEF
SCHRIFTFARBEF
FREIHANDF
LINIEF
VIERECKFF
KREISEF
LABEL FF
TEXTEINGABEF-
DRUCKENFA
INFOF
QUITF
LABELSF
DATEIEN / DATENF
SPIELEF
( 0000100101111 include SETCOLORF
( 0010001001001 VOID MAIN() IF e$=x1$F
( 1101 ELSEIFF
( 1000100010110 fprint( ENDIFF
( 1110111110110 } PRINTF
PROGRAMMIRSPRACHENF
& FRED FISH RPDF
( TornadoF
KICKSTARTF
ACSFK
AUGE 4000F
CACTUSF
A.U.S.T.R.I.AF
*S.A.F.E. TaifunF
PD SOFTWAREF
ANWENDERF
TEXT max 40 Zeichen !F
TEXT "FF
) F
WIRKLICH EINE NEUE SEITE ?F
NEINF
!ACHTUNG es wird alles Gel
scht !!F
# GFA BASIC ProgrammF
LABEL PAINTFF
" Geschrieben von :F
! Thomas CarstensFF
" im November 1989F
6 Ein Programm zum erstellen von 3.5er Diskettenlabels.F
6 Dabei werden die Druckereinstellungen der PreferencesF
5 verwendet ! Das hei
t : Das Programm m
te mit allenFF
. Druckern f
r den Amiga zusammenarbeiten .F
* Dieses Programm ist Shareware !! F
3 Wenn es Dir gef
llt und Du es benutzen m
chtest,Fn
. schicke bitte 10,-DM an : Thomas CarstensF
2 Jussenhovener str.9F
. 4047 Dormagen 1F
r neue Ideen und Anregungen w
rde ich mich freuen !F
, Also viel Spass ............ T.c. F
Brauchst Du Hilfe ?? F
NEINF
. Hilfe zu Label-PaintF
' BOX TASTE BewirktF-
L Texteingabe Links Man kann nun mit der linken Taste eine Zeile aussuchen.F
D Schriftfarbe Links Einstellen der Farbe mit der Geschrieben wird .F
J Freihand Links Malen so lange die linke Mousetaste gedr
ckt ist. MitF
L der rechten Mousetaste kommt man wieder ins Hauptprogr.F
/ Linie Links So wie oben nur als Linie.Ft
> Viereck Links Wie oben nur das es nun ein Viereck ist .F
6 Rechts Das ergibt ein gef
lltes Viereck.F
+ Kreis Links Kreise malen wie oben.Fs
$ Rechts Kreise gef
llt.F
D Label Links Man kann sich ein Label aussuchen das dann auf F
/ das Diskettenlabel kommt. Fs
7 Rechts Das gesamte Label wird gel
scht !!Fa
6 Der Rest erkl
rt sich von selbst !F